C!T ROM 3/ct-rom iiib.zip/ct-rom iiib/WINDOWS/DIVERSEN/WINE02BX/X-WIN.ELC

Text File | 1993-03-28 | 2KB | 16 lines

;;; compiled by @win386 on Sat Mar 13 14:27:42 1993
;;; from file c:/src/lucid-19.4/lisp/term/x-win.el
;;; emacs version 19.3 Lucid.
;;; bytecomp version 2.08; 27-aug-92.
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs18.

(if (and (boundp 'emacs-version)
     (or (and (boundp 'epoch::version) epoch::version)
         (string-lessp emacs-version "19")))
    (error "This file was compiled for Emacs19."))

(defvar x-daemon-mode nil "\
When set, means initially create just a minibuffer.")
(byte-code "└┴Mê\n├=½ƒ─B╞╚╔!ê╚╩!ê╚╦!ê╠╬!A¬ä╤╥!ê╙╘Mê╒╫╙╙─█Mê▄▐▀#ê▄αß#ê▄Γπ#ê▄Σσ#ê▄µτ#ê▄Φπ#ê▄Θτ#ê▄Ωδ#ê▄∞▀#ê▄φε#ê▄∩≡#ê▄±≥#ê▄≤⌠#ê▄⌡ë#ê▄÷≈#ê▄8÷≈#ê∙·√#ê∙·√<#ç" [x-establish-daemon-mode #[(switch) "└ëç" [t x-daemon-mode] 2] window-system x x-pop-initial-window window-setup-hook x-create-screen screen-creation-func require screen x-faces x-iso8859-1 (lambda nil (error "Suspending an emacs running under X makes no sense")) suspend-hook x-open-connection command-line-args command-line-args-left error "Loading x-win.el but not compiled for X" x-activate-region-as-selection #[nil "└┴┬!!¡ë├─┬!┴┬!B!ç" [marker-buffer mark-marker t x-own-selection point-marker] 4] x-own-clipboard kill-hooks x-disown-selection zmacs-deactivate-region-hook zmacs-activate-region-hook zmacs-update-region-hook #[nil "└┴┬┴#ê├─!ê├┼!ê╞╚    ╩┬!ê╦!ç" [set-input-mode t nil require x-mouse xselect x-track-pointer mouse-motion-handler x-iso8859/1 character-set-property pop-initial-screen delete-screen terminal-screen] 4] define-key global-map home "
" left "" up "" right "" down "" prior next end "" begin page\ up "÷" page\ down "" kp_enter [return] kp_tab [tab] undo help help-for-help help-map substitute-key-definition split-window-horizontally x-new-screen ctl-x-map] 4)